﻿

Public Class TableMortalite_TD_88_90
    Inherits TableMortaliteIntegreeActuariat

    Public Sub New()
        MyBase.New("TD_88_90")
    End Sub

    Protected Overrides Function TableauNbVivants() As Double()

        Dim Values(120) As Double

        Values(0) = 100000
        Values(1) = 99129
        Values(2) = 99057
        Values(3) = 99010
        Values(4) = 98977
        Values(5) = 98948
        Values(6) = 98921
        Values(7) = 98897
        Values(8) = 98876
        Values(9) = 98855
        Values(10) = 98835
        Values(11) = 98814
        Values(12) = 98793
        Values(13) = 98771
        Values(14) = 98745
        Values(15) = 98712
        Values(16) = 98667
        Values(17) = 98606
        Values(18) = 98520
        Values(19) = 98406
        Values(20) = 98277
        Values(21) = 98137
        Values(22) = 97987
        Values(23) = 97830
        Values(24) = 97677
        Values(25) = 97524
        Values(26) = 97373
        Values(27) = 97222
        Values(28) = 97070
        Values(29) = 96916
        Values(30) = 96759
        Values(31) = 96597
        Values(32) = 96429
        Values(33) = 96255
        Values(34) = 96071
        Values(35) = 95878
        Values(36) = 95676
        Values(37) = 95463
        Values(38) = 95237
        Values(39) = 94997
        Values(40) = 94746
        Values(41) = 94476
        Values(42) = 94182
        Values(43) = 93868
        Values(44) = 93515
        Values(45) = 93133
        Values(46) = 92727
        Values(47) = 92295
        Values(48) = 91833
        Values(49) = 91332
        Values(50) = 90778
        Values(51) = 90171
        Values(52) = 89511
        Values(53) = 88791
        Values(54) = 88011
        Values(55) = 87165
        Values(56) = 86241
        Values(57) = 85256
        Values(58) = 84211
        Values(59) = 83083
        Values(60) = 81884
        Values(61) = 80602
        Values(62) = 79243
        Values(63) = 77807
        Values(64) = 76295
        Values(65) = 74720
        Values(66) = 73075
        Values(67) = 71366
        Values(68) = 69559
        Values(69) = 67655
        Values(70) = 65649
        Values(71) = 63543
        Values(72) = 61285
        Values(73) = 58911
        Values(74) = 56416
        Values(75) = 53818
        Values(76) = 51086
        Values(77) = 48251
        Values(78) = 45284
        Values(79) = 42203
        Values(80) = 39041
        Values(81) = 35824
        Values(82) = 32518
        Values(83) = 29220
        Values(84) = 25962
        Values(85) = 22780
        Values(86) = 19725
        Values(87) = 16843
        Values(88) = 14133
        Values(89) = 11625
        Values(90) = 9389
        Values(91) = 7438
        Values(92) = 5763
        Values(93) = 4350
        Values(94) = 3211
        Values(95) = 2315
        Values(96) = 1635
        Values(97) = 1115
        Values(98) = 740
        Values(99) = 453
        Values(100) = 263
        Values(101) = 145
        Values(102) = 76
        Values(103) = 37
        Values(104) = 17
        Values(105) = 7
        Values(106) = 2
        Values(107) = 0
        Values(108) = 0
        Values(109) = 0
        Values(110) = 0
        Values(111) = 0
        Values(112) = 0
        Values(113) = 0
        Values(114) = 0
        Values(115) = 0
        Values(116) = 0
        Values(117) = 0
        Values(118) = 0
        Values(119) = 0
        Values(120) = 0

        Return Values

    End Function

End Class